﻿
#r "../Debug/Cephei.Kernel.dll"
#r "../Debug/Cephei.Core.dll"
#r "../Debug/Cephei.QL121.dll"
#r "../Debug/Cephei.QL121.impl.dll"
#r "../Debug/Cephei.Fun121.dll"

open Cephei
open System

let fac = new Cephei.QL.Times.Calendars.CTARGET_Factory ()
let cal = fac.Create ()

let d = new DateTime (2012, 05, 18)

let q = 
    [ cal.IsBusinessDay d
    ; cal.IsEndOfMonth d
    ; cal.IsHoliday d
    ; cal.IsWeekend QL.Times.WeekdayEnum.Friday 
    ]

let cal2 = Fun.Times.Calendars.TARGET.Create ()

type Fred () = 

    let _var = "initial"
    let mutable _vars = "initial"

    member this.Var with get () = _var and set(v) = ()
    member this.Var1 = _var
    member this.Vars with get () = _vars and set(v) = _vars <- v

